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EDITORIAL 


Estimados amigos: 

Ya el año se encuentra en 
pleno desarrollo y, como todos 
los meses, volvemos a 
reencontrarnos ahora ya 
instalados en nuestras nuevas 
olicinas ubicadas en la Avda. Feo. 
Bilbao 4226 de la comuna de Las 
Condes, para poder así mejorar 
nuestra comunicación. Una 
comunicación que se ha ido 
incrementando mes a mes. Sus 
sugerencias e interrogantes 
estamos tratando de resolverlas. 
Sobre todo los referidos a cómo 
conseguir los números atrasados 
de nuestra Revista. Con la nueva 


ubicación esperamos poder 
recibirlos mejor, para entregarles 
así las viejas ediciones. Ediciones 
que no pierden vigencia con el 
paso del tiempo y que son 
necesarias para darle una 
continuidad a los cursos que 
aquí se están desarrollando. 

En este número hemos 
incorporado el primer capítulo 
de un curso de protección de 
Software, que esperamos sea de 
su agrado. Siguiendo sus 
sugerencias, hemos 
incrementado el número de 
programas para tipear en el 
computador. 
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ENTREVISTAMOS AL 

COUGIO OMEGA 


lin este número, hemos 
entrevistado al director de 
otro de los colegios que han 
elegido al computador Atari, 
para ingresar a sus alumnos al 
fascinante mundo de la 
computación. 

Todo comenzó hace 
cuatro años, comenta el 
director del colegio Omega, 
Don Sergio Alvarez Hidalgo, 
cuando 4 profesores del 
establecimiento, realizaron un 
curso intensivo organizado 
por la Universidad Católica de 
Chile y, por supuesto, se basó 
en los computadores Atari. 

El mismo, nos cuenta, 
duró todo el mes de enero de 
ese año y se basó en los 


principios del lenguaje Logo y 
del lenguaje Basic. Fue un 
curso dirigido únicamente 
para docentes. Al final del 
curso, se tomó la decisión de 
adquirir dos computadores 
Atari 800 XL, los cuales al 
corto tiempo se hicieron 
insuficientes ante el gran 
interés despertado entre el 
alumnado y se decidió por la 
compra de otros dos. 

Los cursos que aquí se 
brindan son totalmente 
voluntarios. Se desarrollan dos 
veces por semana, incluido 
uno el día sábado. Como se 
destina un computador por 
cada das personas, 
generalmente se debe crear 


una lista de espera para poder 
ingresar a los cursos. 

Se enseña el lenguaje 
Logo para los niños de la 
enseñanza Básica y el 
lenguaje Basic para los de la 
enseñanza Media. 

Los niños más pequeños 
mostraron un interés mucho 
mayor que los mayores, 
demostrado por el hecho que 
un 70% de éstos manifestaron 
interés en los cursos, cifra qut 
bajaba hasta un 20% entre los 
de educación Media. Claro 
que estos últimos cuando se 
ponían frente al computador, 
no había quien los detenga. 

El método de enseñanza 
utilizado se podría sintetizar 




de la siguiente manera: 

.Primero, se muestran las 
instrucciones generales. 

- Segundo, se hacen 
programas en papel y lápiz. 

- Tercero, se verifican en el 
computador. 

Cuarto, se deben encontrar 
y analizar los errores 
aprendiendo de ellos. 

No se utiliza la calificación 
sobre los trabajos, 
simplemente se busca que, 
cada cual a su medida, vaya 
incorporando los conceptos 
de la computación en base a 
su propia creatividad. 

Los resultados logrados 
son sorprendentes, cuenta 
orgulloso el Director del 
Establecimiento y nos cuenta 
cómo, un niño realizando 
sencillos ejercicios con figuras 
geométricas en lenguaje Logo, 
terminó dibujando una 
iglesia. 

También logramos 
beneficios extras, comenta, 
como ser que los niños a 
través del Logo, empiecen a 
manejar ángulos, por lo que al 
llegar a esa etapa de las 
matemáticas, pueden 
resolverlo con mucha 
facilidad. 

Sin duda, concluye, el 
computador nos ha facilitado 
mucho la tarea de educar a 
los niños. 


Files 

Binarios 








Muchas veces los Atarianos 
nos encontramos investigando 
los sistemas de cargas de 
programas para agilizarlos o 
bien para lograr que 
determinado archivo que carga 
de diskette pueda hacerlo 
también desde el cassette. 

Al no existir mucha 
documentación en los 
manuales del computador y al 
recibir muchas consultas sobre 
el tema, incorporamos en este 
artículo una primera 
introducción acerca de la carga 
de programas con la estructura 
de Files Binarios. 

Un File Binario está 
compuesto por una sucesión 
de áreas de memoria a cargar. 

Cada área de memoria está 
constituida por dos secciones, 
un vector de carga y una 


secuencia de bytes que se 
cargarán en la memoria. 

El vector de carga contiene 
tcxla la información necesaria 
para indicarle al computador en 
dónde tiene que almacenar la 
secuencia de bytes que vienen 
a continuación y cuánta 
información viene en el área de 
memoria a cargar. 

El vector de carga está 
compuesto por 6 ó 4 bytes. Los 
dos primeros son $FF, que son 
obligatorios en el primer área 
de memoria del archivo y no 
en los siguientes. Estos dos 
bytes le indican al D.O.S. que el 
archivo es binario, pero en los 







siguientes stages o zonas a 
cargar no son necesarios. 

Luego de estos dos bytes 
opcionales siguen dos que 
indican la zona de memoria en 
donde va a comenzar a cargar 
el computador y dos bytes más 
que le indican hasta dónde 
cargar. Por ejemplo: 

FF FF 00 06 02 06 

Está indicando que el 
archivo es binario por los das 
bytes opcionales y el primer 
bloque se cargará desde $0600 
a $06()2. Esto es así, pues los 
bytes que indican el Load 
Adress o zona de carga y el 
End Adress o final de carga 
están expresados con el sistema 
de LO y HI bytes. 

En este ejemplo de vector 
de carga se estarían cargando 3 
bytes en la memoria. Si 
después del vector de carga 
vienen los bytes 03 06 y 01, 
luego de realizar la carga de 
este bloque las direcciones 
quedarían con el siguiente 
contenido: 

$600 — > 03 
$601 —> 06 
$602 —> 01 

Cuando un stage es 
cargado por completo, quiere 
decir que los bytes 
comprendidos entre el Load 
Adress y el End Adress han sido 
leídos y almacenados en su 
posición de memoria, las 
direcciones $2E2 y $2E3 son 
examinadas. 


Si ambas contienen ceros, 
se vuelve a cargar otro stage si 
es que existe. Si no son cero, 
se ejecuta un llamado a la 
subrutina apuntada por estos 
dos bytes y luego se devuelven 
estas dos posiciones en cero y 
se carga otro stage. 

Esta estructura de análisis 
de las posiciones $2E2 y $2E3, 
permite en el medio de una 
carga que se ejecuten partes 
del programa como 
presentaciones o sonidos que 
se mantienen durante el resto 
de la carga del programa. 

Cuando se trata de cargar 
otro stage del programa y la 
diskettera nos informa que se 
ha alcanzado el final del 
programa (EOF), la carga del 
programa finaliza y viene el 
proceso de ejecución del 
programa. 

En este momento, el 
computador analiza las 
posiciones de memoria $2E0 y 
$2E1. Si ambas son cero, 
termina la carga y no se ejecuta 
el programa, pero si no lo son 
estos valores indican el 
comienzo del programa y el 
computador realiza un llamado 
a la zona de memoria apuntada 
por estas dos posiciones. 

Una vez analizada la 
estructura de Files Binarios, en 
la próxima edición de TURBO 
news, incorporaremos la carga 
de discos Boot y trabajaremos 
con el Omnimon para describir 
cómo se pasan los archivos de 
una estructura a la otra. 
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En este número, para 
concluir los métodos 
de almacenamiento 
de información, 
veremos el segundo 
de ellos: “el acceso 
directo”. También 
veremos otro 
pequeño grupo de 
nuevas instrucciones. 


lin el número anterior 
habíamos hablado que existía 
el modo de almacenamiento 
secuendal, es decir cada dato 
grabado a continuación del 
anterior, y para llegar a 
cualquiera de ellos, se debían 
recorrer todos los anteriores, 
método utilizado tanto con la 
cassettera como con la 
diskettera. También contamos 
que existía un segundo método 
para utilizar, sólo con 
diskettera, que era el acceso 
directo. Este se basaba en que 
si queríamos llegar a un dato 
cualquiera, no debíamos pasar 
por los anteriores. Esto no se 
podía hacer con la cassettera, 
ya que no puede alcanzar 
cualquier dato en forma 
inmediata, sino que debe 
esperar que pase la cinta en 
forma secuendal. El disco, al 
estar en continuo movimiento 
de rotación y la cabeza poder 
avanzar o retroceder a cada 
instante, puede alcanzar 
cualquier dato rápidamente. 

Para usar un archivo de 
acceso directo se debe elegir 


un campo que sea clave, es 
decir, que todo el archivo esté 
ordenado según ese criterio. 

Por ejemplo el nombre de la 
persona, la edad, un código de 
cliente, etc. Conviene que sea 
un número. Si no lo es, existen 
maneras de convertir cualquier 
texto en número, por ejemplo 
asignándole a cada letra un 
valor, para luego sumar todas 
las letras y obtener un 
resultado. En el ejemplo que 
daremos en la parte de 
programas veremos cómo hacer 
un programa que maneje un 
stock de hasta 2080 productos. 
Notarás, con el uso, que podrás 
preguntar por cualquiera de los 
2080 productos siendo la 
respuesta casi inmediata, cosa 
que no sucede en el caso del 
acceso secuendal ya que para 
llegar al registro 2080 debería 
buscar por los 2079 anteriores. 









Para simplificar esc ejemplo 
elegiremos, como campo clave, 
im campo numérico llamado 
"código de producto". 

Antes de entrar en tema* 
veremos brevemente unas „ 
instrucciones nuevas utilizadas 
aquí. ^ 


INSTRUCCION ADR 


Esta instrucción también es 
utilizada sólo por los 
programadores más avanzados 
y se utiliza para saber en qué 
dirección se encuentra 
almacenada alguna variable. 
Ejemplo: 


PRINT ADR(NOMBRES) 


INSTRUCCION 
POKE pos.,valor 


Esta instrucción se utiliza 
para poner un determinado 
valor en una posición de 
memoria. Para poder utilizar 
esta instrucción hay que poseer 
un mapa de memoria, como el 
que estamos entregando en la 
revista, que nos diga para qué 
sirve cada posición de 
memoria, y qué valores pueden 
ser depositados ahí. Un 
ejemplo de su utilización sería 
hacer: 

POKE 710,1 

La posición 710 maneja el 
color de fondo de la pantalla y 
si le ponemos el valor 1, 
logramos que ésta tome el 
color negro. Puedes probar de 
ponerle otros valores. Hay que 
tener en cuenta que el valor 
que se puede “pokear" varía de 
0 a 255. 


INSTRUCCION 

PEEK(pos.) 

Esta instrucción se utiliza 
para "leer” el contenido de 
alguna posición de memoria. 
Puedes probarla haciendo: 

PRINT PEEK(710) 

También, para poder 
utilizarla, se necesita poseer un 
mapa de memoria. 

INSTRUCCION USR 

Esta instrucción se utiliza 
cuando queremos agregar una 
rutina en lenguaje de Máquina 
a un programa Basic. Esta 
instrucción la utilizan 
programadores avanzados 
cuando encuentran que el 


Basic o no puede realizar 
alguna cosa o no lo hace a la 
suficiente velocidad. A efectos 
de este curso, donde se supone 
no existen conocimientos 
previos del Asscmbler, la 
veremos como una “caja 
negra" la que le indicaremos, 
cuando la vayamos utilizando, 
para qué sirve. 











Ahora sí estamos en 
condiciones de retomar el tema 
del acceso directo. Para ello 
utilizaremos una rutina intema 
que pasee el computador, 
llamada SIO. Para poder 
utilizarla, ésta necesita que se 
le entreguen varios datos. Estos 
son: 

- Qué dispositivo va a utilizar 
(en este caso la diskettera 1) 

- Qué tipo de operación va a 
realizar (lectura o escritura) 

- De qué zona tiene que tomar 
o dónde debe dejar la 
información tomada del disco 
(en cuál variable) 

- De cuál sector del disco debe 
tomar o dejar la información. 

Cuando concluya cada 
operación, el computador 
entregará el resultado 
correspondiente. 

El tipo de dispositivo que 
se va a utilizar se indica a 
través de la posición de 
memoria 768. Pokeándole allí 
un 49 se indica que se va a 
utilizar una diskettera. 

Mediante la posición de 
memoria 769 se le indica cuál 
es el número de diskettera que 
se va a utilizar. En este caso 1. 

En la posición 770 
debemos poner la operación 
que se va a realizar. Un 82 
indica lectura y un 87 
grabación. 


En las posiciones 772 y 773 
debemos poner la dirección de 
la variable que vamos a utilizar 
para tomar o dejar los datos. 
Esto se realiza mediante una 
fórmula matemática que podrís 
tomar del ejemplo. 

A través de las posiciones 
778 y 779, debemos indicarle 
qué sector del disco queremos 
leer, aplicando la misma 
fórmula matemática en el caso 
anterior. 


Finalmente leyendo con la 
instrucción PEEK el contenido 
de la posición 771, sabremos si 
se produjo un error o no 
durante la operación de lectura 
o grabación. 

Veamos cómo se realiza 
todo esto en programación, si 
quisiéramos leer o grabar el 
sector 50. 
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BASIC 



10 DCB=768 

20 DIM BUFFER$(128),PRG$(6) 

30 POKE DCB,49:POKE DCB+1,1 
35 REM TOMAMOS LA 
DIRECCION DE LA VARIABLE Y 
LA GUARDAMOS EN SU LUGAR 
40 ADDR=ADR(BUFFER$) 

50 ADDRHI=INT(ADDR/256) 

60 ADDRLO=ADDR- 
(ADDRHI*256) 

70 POKE DCB+4.AUURLO 
80 POKE DCB+5.ADDRHI 
90 SECTOR-50 

95 REM TOMAMOS EL NUMERO 
DE SECTOR Y LO GUARDAMOS 
EN SU LUGAR 

100 SECTORHI=INT(SECTOR/ 
256) 

120 SECTORLO=SECTOR- 
(SECTORHP256) 

130 POKE DCB+IO.SECTORLO 
140 POKE DCB+11.SECTORHI 
150 POKE DCB+2,82:REM PARA 
LEER 

160 POKE DCB+2,87:REM PARA 
GRABAR 

170 FOR 1=1 TO 5:READ 
A:PROG$(l,l)=CHR$(A):NEXT I 
180 X=USR(ADR(PRG$)) 

190 DATA 104,32,83,228,96 

Atari divide al disco en 
1040 sectores, pudiendo 
almacenar cada uno de ellos 
128 caracteres o bytes. Para 
mayor información de la 
estructura del disco, podrá 
consultar nuestros números 
anteriores. 

Lo que liemos logrado 
ahora, es que dado un número 
de sector podamos tomarlo 
rápidamente y guardarlo en 
una variable de longitud 128. 
Allí podemos poner la 
información que deseemos, 
nombres, teléfonos, etc. Si 


hacemos por ejemplo que el 
número de sector coincida con 
el campo clave del archivo, 
como ser código de cliente, 
buscar el cliente número S, 
puede convertirse en buscar el 
sector número 5, pudiendo por 
consiguiente tener hasta 1040 
clientes. Podemos hacer aún 
más: podemos poner dos 
clientes |X)r cada sector, 
entonces en el sector 1 estarán 
el cliente 1 y el 2. Si queremos 
buscar el cliente 19. estará en la 
primera mitad del sector 10 y el 
20 en la segunda mitad. Esto es 
lo que hemos hecho en el 
programa que se encuentra al 
final ile la revista. Dicho 
programa maneja hasta 2080 
productos con acceso directo. 
También se ha puesto incapié 
en dicho programa, de cómo 
manejar de manera más 
agradable a la vista las 
pantallas. Un mismo programa, 
realizado con una presentación 


lx>nila, aunque haga menos 
cosas, es mucho mejor 
cotizaik >. 

Para lograr esa presentación 
se ha utilizado una nueva 
instrucción: 

INSTRUCCION 
POSITION X,Y 

lista instrucción se ha 
creado para ser utilizada 
precediendo a la instrucción 
PRINT o IN'PUT y le indica a 
éstas, en qué posición de la 
pantalla delx- imprimir o tomar 
algún dato. Por ejemplo: 

POSITION 4,5:PRINT "HOLA" 

Imprimirá en la cuarta 
columna y quinta fila, la palabra 
he )la. 

i ¡Nos vemos en el próximo 
número!! 
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La protección del 

SOFTWARE 

LECCION 1 


INTRODUCCION 

Muchas veces, cuando 
luego de mucho esfuerzo, 
hemos logrado hacer un 
programa que deseamos 
comercializar, la primera 
pregunta que nos hacemos es 
cómo evitar que éste sea 
reproducido sin nuestro 
consentimiento y beneficio, 
listo nos lleva a tener que 
proteger nuestros programas. 

Li falta de protección lleva a 
que los programadores desistan 
del esfuerzo de resolver un 
problema cualquiera, debido 
que por cada copia que él 
pueda llegar a vender, se 
venden un número mayor de 
programas no originales. La 
protección, al mismo tiempo 
que soluciona uno de los 
problemas que es la copia 
pirata, crea uno nuevo, que es 
el hecho de que el comprador 
de un ejemplar legítimo, desee 
tener HACK-IJP o copia de él, 
por las dudas que se le heche a 
perder. Por ello en todas las 
protecciones habría que tener 
en cuenta la posibilidad de que 
el dueño desee tener respaldo 
de sus programas. 


Todos los programas son 
copiables de una u otra 
manera, si no fuera así el 
dueño del programa no podría 
reproducirlo para poder 
venderlo. El tema consiste en 
hacer la copia lo más difícil 
posible para así desalentar a la 
mayoría. 

También es cierto que un 
programa que se copia 
fácilmente, también se difunde 
fácilmente con la consiguiente 
publicidad que eso ocasiona. 
Muchas excelentes programas, 
sumamente protegidos, no han 
logrado mayor difusión 
justamente por ello. 

Comenzaremos a ver cómo 
proteger los programas escritos 
en Basic. 

PROTECCION DE 

PROGRAMAS BASIC 

El principal problema en la 
protección de programas 
escritos en lenguaje BASIC, es 
la posibilidad de detener los 
programas, ya que al hacerlo, 
cualquier persona desde el 
Basic puede ejecutar la 
instrucción SAVE o CSAVE y 
guardarlo en un disco o 


A partir de este 
número y en ios 
sucesivos, les 
iremos entregando 
técnicas para 
proteger el 
Software que 
vayamos 
realizando. 







donde sabemos que no hace 
nada y simplemente le devuelva 
el control al programa. Esto se 
logra poniendo las siguientes 
instrucciones al principio del 
programa: 

POKE 566,PEEK(518) 

POKE 567,PEEK(519) 

La segunda manera es 
modificar el vector de 
interrupción del POKEY para 
que no atienda esta 
interrupción. lx> hacemos con 
las siguientes instrucciones. 

POKE 16.112 
POKE 53774,112 

Cabe destacar que la 
instrucción GRAPHICS, vuelve 
estas últimas dos posiciones a 
sus valores originales, por lo 
que se debería repetir estas 
instrucciones cada vez que se 
use. 


cassette propio. Las maneras 
que existen de detener un 
programa son: 

- Mediante la tecla BREAK. 

- Mediante la tecla RESET 

- Forzando un error. 

- Cargando el programa con 
LOAD o CLOAD y luego 
grabarlo con SAVE o CSAVK. 

TECLA BREAK 

Oprimiendo la tecla BREAK 
se pueden detener los 
programas sin que se borre el 
contenido de la memoria. Para 
evitar esto, existen dos 
métodos. 

El primero es.modificar el 
vector de interrupciones. 
Cuando se oprime la tecla 
BREAK. se produce una 
interrupción. El computador 
posee un vector donde tiene 
guardada la dirección de la 
rutina que atiende dicha 


interrupción. Ix) que hacemos 
es modificar el vector para que 
en lugar de apuntar a la rutina 
de atención de la interrupción, 
apunte a una zona de memoria 
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La protección del Causará que se bloqueen 

las teclas del computador, 

SOFTWARE cuando la tecla RESET sea 

oprimida. 

FORZANDO UN ERROR 


El proteger la tecla BREAK 
también puede ser útil para 
evitar errores involuntarios 
durante la utilización de un 
programa BASIC. 

TECLA RESET 

El oprimir esta tecla 
durante la ejecución de un 
programa, también produce su 
detención, sin que se borre d 
contenido de la memoria. 

Para evitarlo, también 
existen dos formas. 

Poniendo al principio del 
programa: 

POKE 580,1 

Cuando se oprima la tecla 
RESET el computador se 
BOOTKARA de nuevo, es decir 
producirá el mismo efecto que 
haber apagado y prendido el 
computador de nuevo. 

Poniendo: 

POKE 9,255 


Cuando en un programa se 
produce un error, éste se 
detiene, como por ejemplo 
sucede si ingresamos un valor 
alfanumérico cuando se nos 
solicita uno numérico. 

Para evitar este tipo de 
"trampas” se debe procurar 
que el programa pueda evitar 
que se produzcan errores. Eso 
se logra con la utilización de la 
instrucción Basic TRAE 

COMBINACIONES 

DE INSTRUCCIONES 

LOAD-SAVE, (TOAD 
Y CSAVE. 

Para evitar este tipo de 
copia, debemos agregar al final 
de nuestro programa la 
siguiente instrucción: 

32120 POKE PEEK(138)+256* *PEE 
K(139)+2,0:S AVE "D:nombre prog 
rama":NEW 

Cuando guardemos el 
programa, en lugar de hacerlo 
con una instrucción SAVE 
debemos hacerlo con la 
instrucción GOTO 32120. 
Conserva una copia guardada 


con SAVE, para tener así un 
ejemplar listable. En el caso de 
tener cassettera, deberás 
reemplazar el SAVE "D: por 
SAVE "C:. Una vez que el 
programa esté así protegido, 
cuando se encuentre en 
memoria, la ejecución de 
cualquier comando en modo 
inmediato, hará que el 
computador se bloquee. Para 
ejecutar un programa que 
tenga esta protección, se 
deberá hacer RUN "D:nombre" 
o RUN "C:, pero no se podrá 
hacer LOAD "D:NOMBRE" o 
LOAD "C:. 

Si lo que queremos hacer 
es proteger un programa no 
contra copia, sino para que no 
se pueda modificar, existe una 
manera para encriptar los 
programas de la siguiente 
manera: 

FOR NI 9=PEEK(130)+PEEK(131 )* 
256. TO PEEK( 132)+PEEK( 133)*25 
6:POKE N19,155:NEXT N19 

1,0 que hacemos aquí es 
reemplazar todos las nombres 
de las variables por el carácter 
155 (RETURN), quedando los 
listados totalmente 
distorsionados. Puedes intentar 
cambiar el 155 por otros 
caracteres produciéndose 
distintos efectos. 
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Mapa de 
memoria 


En esta edición de tu revista TURBO 
news continuamos desarrollando el análisis 
de las distintas posiciones de memoria 
afectadas al trabajo del Sistema Operativo 
y a los Chips del Hardware de tu Atari. 



En la Edición de Diciembre 
desarrollamos conceptos muy 
importantes dentro del mapa 
de memoria del computador 
que manejan el tema de las 
interrupciones. No hicimos 
ninguna mención práctica, pues 
está en nuestros planes 
incluirlo en unas cuantas 
lecciones del curso de 
Assembler cuando éste avance 
en su nivel. 

En esta edición 
trabajaremos la zona de 
memoria comprendida entre 
$230 y $2BE. 

Siempre al tratar el mapa 
de memoria dejamos sin 
explicación muchas de las 
posiciones de memoria 
utilizadas por el Sistema 
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Operativo, pues éstas no 
revisten demasiada importancia 
para el programador, pues 
pueden operar como variables 
temporales dentro de rutinas 
poco trascendentes. 

560.561 $¿30,$231 SDLSTL: 
listas dos posiciones de 
memoria, definen el comienzo 
de la dirección del Display List. 

564 $234 LPENH: En esta 
posición de memoria, el 
Sistema Operativo del Atari 
almacena la posición horizontal 
de la lectura del Lápiz de Luz. 

565 $235 LPENV: Posición 
vertical del Lápiz de Luz sobre 
la pantalla. 

580 $¿44 COLDST: lista 
dirección del mapa de 
memoria contiene un flag que 
define la acción que va a tomar 
el computador en caso de ser 


presionada la tecla Reset. Si 
esta posición contiene un cero, 
al presionar Reset no se genera 
un reboot del sistema. Si en 
cambio su contenido es 1, al 
presionar Reset el equipo 
realiza las mismas tareas que 
hace cuando se enciende el 
computador. 

624 $¿7Ü PADDI.O: lin esta 
posición de memoria, el 
sistema operativo almacena el 
valor de la lectura del paddle 
Nro. 0. liste valor puede oscilar 
entre 0 y 228. 

625 $271 PADDLl: valor del 
paddle 1. 

626 $272 PADDL2: valor del 
paddle 2. 
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632 $278 STICK0: Esta posición 
registra la posición en la que 
se encuentra el bastón del 
joystick 1. 

633 $279 STICK1: Esta posición 
similar a la anterior, registra el 
contenido de la lectura del 
joystick 2. 

694 $2B6 INVFLG: Esta 
posición de memoria refleja a 
un flag que indica si el teclado 
está o no en video inverso. Un 
valor cero en esta posición 
indica que el teclado está en 
video común, pero si 
pokeamos un 128 el teclado se 
convierte en video inverso. 

702 $2BK SHPLOK: Esta 
posición contiene un flag que 
indica si el teclado está 
trabajando en mayúsculas o 
minúsculas o bien si está 
siendo ocupada la tecla 
Control. Bikeando un cero, el 
teclado trabaja con minúsculas, 
con un 64 lo hace con 
mayúsculas y cuando posee un 
128 la tecla Control está siendo 
accionada. 
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LECCION 9 

En las lecciones 
anteriores de este 
curso hemos 
comenzado a 
analizar las distintas 
rutinas que 
conforman el 
programa que 
decidimos 
desarrollar y en esta 
lección 

continuaremos con 
esta apasionante 
tarea. 
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Tomaremos como patrón, 
para seguir analizando el 
programa, el diagrama de Ilujo 
que desarrollamos en la 
Edición Nro. 7 en su página 12 

Ocuparemos cada uno de 
los símbolos del diagrama para 
estudiarlos en la práctica en el 
listado del programa. 
Comenzaremos con el primer 
rectángulo del programa que 
define a Flagnum en cero. 

El programa debe saber, en 
cada instante, si debe o no 
numerar automáticamente cada 
vez que el usuario termina de 
agregar una línea en el 
programa, para esto definimos 
la variable Flagnum que puede 
tener dos valores: cero o 
distinto de cero. Si el valor que 
posee es un cero, el programa 
no numera automáticamente a 
menos que el usuario ingrese 
el comando de numeración 
automática "Numerar ". Si se 
ingresa el comando de 
numeración automática, la 


variable Flagnum toma un valor 
distinto de cero. 

Cuando se inicia el 
programa luego de definir 
algunos parámetros importantes 
en el Rótulo INICIO, en la línea 
1330 del programa 
EDITOR MAC, encontramos las 
instrucciones que definen a 
Flagnum en cero. Luego antes 
de que el computador solicite 
al usuario otra línea, consulta si 
Flagnum está o no en cero. 


Esto lo realiza en las líneas 
siguientes a la 1S7U. Las líneas 
I.DA FLAGNl I.M y BNE 
NUMERACION, vienen a 
representar al primer rombo 
del diagrama de Ilujo, en el 
cual se decide si se imprime o 
no en la pantalla un número de 
instrucción. 

El segundo rectángulo del 
diagrama de flujo del programa 
se utiliza para definir a un 
puntero que va a recorrer 
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durante todo el programa a la 
tabla de instrucciones, lista 
tabla se va a ubicar dentro de 
la memoria del sistema, a 
continuación del listado del 
programa. Para esto, en la línea 
6900 del programa 
EDITOR. MAC, definimos el 
rótulo Tabla. En las líneas 1460 
a 1490, definimos a FINTAB 
que va a apuntar a la primera 
|X>sición de memoria 
disponible para almacenar 
alguna instrucción en la tabla. 
Para realizarlo ingresamos las 
líneas: 

LDA #<TABLA 
STA FINTAB 
LDA #>TABLA 
STA FINTAB+1 

lista variable FINTAB es 
rmxlificada cada vez que se 
agrega algún byte en la tabla de- 
instrucciones para que siempre 
mantenga la primera posición 
libre dentro de la tabla. Otra de 
las aplicaciones de esta 
variable, es tener en cuenta que 
si estamos recorriendo toda la 


tabla con algún fin como el de 
listar todo el programa, si nos 
excedemos de la posición 
apuntada por FINTAB, estamos 
invadiendo zonas de memoria 
que no contienen el listado del 
lenguaje. 

Luego de comparar a 
Flagnum con cero y 
determinando que este posee 
el valor que indica que no 
existe numeración automática, 
el programa ejecuta un IMF 
SINUMERACION para que el 
usuario ingrese una línea de- 
programa o un comando a su 
elección, lista tarea está 
representada por el siguiente 
rectángulo en el diagrama de¬ 
dujo del programa, ubicado a la 
izquierda del rombo que 
interroga sobre el valor de 
Flagnum. 

En el rótulo 

SI NUMERACION, que se 
encuentra a partir de la línea 
2670, se ejecuta un llamado a 
la subrutina TOMOL1NHA que 
se queda esperando hasta que 
el usuario presione la teda 



Return luego de ingresar una 
línea. Esta subrutina lómolínea, 
afecta a la zona de memoria 
denominada por el programa 
como LINEA, definida en $9000 
en la instrucción 190 de 
EDITOR.MAC. Cuando el 
usuario termina de ingresar ta 
instrucción o el comando, el 
contenido de las teclas 
presionadas se localiza en la 
memoria a partir de esta 
posición denominada Línea. 

Por eso en las siguientes 
instrucciones se consulta si la 
primera posición de la zona 
Línea es un $9B que representa 
un Return. 

Si el primer carácter de¬ 
linea es un Return, significa 
que el usuario sólo presionó 
esta tecla y no existe ningún 
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ASSEMBLER 


de memoria LINEA 
incrementando al registro Y poi 
cada espacio en blanco que la 
línea posea antes de algún 
carácter. Cuando encuentra un 
carácter distinto al byte #32 que 
representa al espacio en 
blanco, realiza un movimiento 


a izquierda de toda la línea 
superponiéndose ésta en todos 
los espacios en blanco. Para ver 
clara esta situación, 
incorporamos el diagrama de 
flujo de esta rutina para que 
puedas entender con mayor 
precisión su funcionamiento: 


comando o instrucción en la 
línea. Esto si bien no se ve 
razonable es muy útil para 
anular la numeración 
automática del programa. 
Quiere decir que si el sistema 
está numerando 
automáticamente, el usuario 
puede abortar la numeración 
ingresando una línea nula. 

Para lograr este efecto, en 
la línea 2770 definimos 
nuevamente a Flagnum en cero 
y luego de imprimir el mensaje 
LIST en la pantalla el programa 
vuelve a esperar otra línea. Esta 
operatoria viene a representar 
al siguiente rombo del 
diagrama de flujo, en donde se 
cuestiona si la línea ingresada 
fue un Retum y si lo fue se 
ejecuta un Flagnum=0. 

Si la línea ingresada por el 
usuario no fue un Retum 
debemos eliminar los posibles 
espacios en blanco a la 
izquieida de la instrucción. 

Para esto en la línea 2860 
llamamos a la subrutina 
BLANCIZ. 

Esta rutina recorre la zona 
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lista operación, viene a 
representar al rectángulo que se 
ejecuta en el diagrama de flujo 
del sistema si la línea ingresada 
no fue un Return. Luego se 
verifica en el diagrama si la 
línea ingresada en realidad es 
un comando o bien una 
instrucción. Para esto lo que se 
verifica es si el primer carácter 
de Línea está comprendido 
entre los caracteres ü y : Esto 
es así, pues en la tabla de 
caracteres ATASCIl, después del 
número 9 viene el : Entonces si 
el primer byte de la línea 
ingresada está comprendido 
entre el rango OY:, la línea 
contiene una instrucción para 
el cartel. 

Este trabajo en el listado 
del programa se realiza en las 
líneas comprendidas entre la 
2930 y la 2970. Es importante 
mencionar en esta parte del 
curso que cuando queremos 
comparar si algún byte es 
menor a otro ejecutamos la 
instrucción BCC y si la consulta 
es por mayor o igual es un BCS 
la que debemos encarar. 

Luego de determinar si la 
línea fue un comando saltamos 
al rótulo COMANDO, ubicado 
en la instrucción 3390 del 
listado. En ella lo que estamos 
analizando es si el comando 
fue válido o no y de serlo lo 
ejecutamos y volvemos a tomar 
una nueva línea del usuario. Si 


en cambio la línea fue una 
instrucción, ejecutamos un 
llamado a la rutina 
NUMEROLINEA, que transforma 
el número de línea en dos 
hytes I II y LO byte, para que 
ésta ocupe menos espacio en la 
tabla del sistema. 

Luego de hacerlo, 
comprimimos de la línea al 
número de instrucción y 
saltamos a la rutina que 
almacena en forma ordenada 
según el número de instrucción 
la línea dentro de la tabla. 

En las siguientes lecciones 
del curso seguiremos 


analizando este entretenido 
sistema y describiremos las 
rutinas que mencionamos en 
esta lección y no las hemos 
tratado con detalle para no 
complicarnos tanto por ahora. 

No te olvides que en la 
sección de programas seguimos 
listando todos los programas 
que componen este sistema. 
Ingrésalos en tu computador y 
grábalos en tu medio de 
almacenamiento con 1 ó 2 
copias para que no pierdas tu 
trabajo. 

Hasta la próxima lección... 




multíCcntro 




OFICINAS GENERALES: 

5 ORIENTE N° 1042 • FONO: 232549 • TALCA 


TALCA : 1 SUR 1320 
LINARES: INDEPENDENCIA 625 
CONSTITUCION: FREIRE 676 


TODO PARA SU ATARI 

















lo 


Gráficos 

por 

computadora 

CUARTA PARTE 


Ahora ya estamos en 
condiciones de realizar 
los primeros programas 
utilizando PLAYERS- 


MiSSILE. En este número 
encontrarás varios 
ejemplos para clarificar 
todas las dudas. 


Ya hemos visto c uáles eran 
las características que daban 
vida a cada uno de los Players- 
Missilc. En este número 
veremos cuáles son los pasos 
necesarios para crearlos. 

la» primero que debe 
hacerse es seleccionar en qué 
parte de la memoria vamos a 
ubicar los dibujos de los 
Players-Missile. Para ello 


conviene utilizar la zona de 
RAM que se encuentra al final 
del Basic, antes de donde 
empieza la utilizada por el 
ROM del ATAR1. Existe una 
posición de memoria que el 
computador utiliza para saber 
cuántas páginas de 256 bytes 
cada una, posee el computador 
disponible para el Basic. Dicha 
posición es la 106 y 


normalmente posee el valor 
160 lo que significa que hay 
40960 bytes disponibles. De 
ellos, una parte lo ocupa la 
pantalla (que va a variar 
dependiendo del modo gráfico 
con el cual se trabaje). Para los 
ejemplos vamos a utilizar el 
modo gráfico 3 que ocupa 240 
bytes. Es fundamental la 
elección del modo gráfico con 
el cual trabajar. Antic 
interrumpe la CPU 6502 y se 
encarga del control de buses 
para su acceso directo a 
memoria una vez por cada byte 
de memoria de pantalla. 
Durante ese tiempo la CPU se 
encuentra en suspenso. Cuanta 
mayor cantidad de memoria 
ocupe la pantalla, más veces 
ANTIC interrumpirá a la CPU y 
no le dejará trabajar en nuestro 
programa BASIC. Todo ese 
proceso de actualización, se 
realiza 60 veces por segundo. 
Por ello, cuando no se necesita, 
conviene utilizar modos 
gráficos que consuman menos 
memoria. También al trabajar 
con PLAYERS-MISSILE, aumenta 
el trabajo del ANTIC, robándole 
tiempo a la CPU. Por ello es 
aconsejable que si no se van a 



usar misiles o cuando se deja 
de trabajar con Players, sean 
desconectados como veremos 
más adelante. 

Como habíamos dicho 
debemos primero seleccionar la 
zona de memoria que 
debemos utilizar. Como hemos 
seleccionado el modo gráfico 3 
y los Players en resolución 
doble ocupan 8 páginas, 
reservamos 16 páginas de 
memoria. Debemos recordar 
que la zona elegida debe ser 
divisible por 8, O sea que si 
tomamos el PEEK de 106, le 
restamos 16 páginas y 
multiplicamos al resultado por 
256 tendremos la dirección 
(PMBASE), donde deben 
comenzar a dibujarse los 
Players, según el esquema de 
utilización de memoria dada en 
números anteriores. 

Ese valor de página donde 
deben almacenarse los Players 
deben pokearse en la posición 
54279. A continuación debe 
indicársele a ANTIC que debe 
empezar a buscar información 
de PLAYERS en la memoria. Se 
hace a través de la posición 
559. Dicha posición está 
compuesta de la siguiente 
manera: 



NUMERO BIT 7 

6 5 

4 

3 

2 

1 

0 

VALOR DEL BIT 128 

64 32 

16 

8 

4 

2 

1 

HABILITACION PANTALLA 

1 






RESOLUCION PM 


1 





HABILITACION PLAYER 



1 




HABILITACION MISSILE 




1 
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BITS 

VAL 


fc2 


7 

O 


6 5 4 

O 1 O 

32 + 


3 2 1 O 

10 1 O 

8 + 2 =42 


El resto ele los bits veremos 
en próximos números partí qué 
se utilizan. Para saber qué valor 
pokear en esta posición de 
memoria debemos sumar los 
valores de los bits de aquellos 
que deseamos prender. El bit 5 
se utiliza para indicarle al 
ANTIC que debe Interrumpir o 
no a la CPU. Normalmente está 
puesto en I, pero si el 
computador está realizando 
complejos cálculos en un 
programa cualquiera y no nos 
interesa ver nada en la pantalla 
durante ese proceso, podemos 
apagarla poniendo en 0 este 
bit, aumentando la velocidad 
de procesamiento un 20%. 

El bit 4 maneja la altura del 
Player, es decir si cada bit que 
dibujamos ocupa una o dos 
líneas de alto, Un uno aquí 
significa gráficos de 1 línea 
(mayor resolución) y un cero, 2 
líneas. 

El bit 3 determina si el 
player está habilitado o no. Lo 
mismo hace el 2 con los 
missiles. Normalmente en un 
programa cualquiera están en 
cero. Si queremos utilizarlos 
debemos ponerlos en uno. 

Los bits 1 y 0 debemos 
decir únicamente que el 1 
normalmente está encendido y 
el 0 apagado. 

Por ejemplo, si queremos 
poner la pantalla normal y 
trabajar con players de 
resolución de dos líneas, 
debemos hacer la siguiente 
cuenta: 


También debe indicársele a 
la GTLA. otro componente del 
computador, que se van a 
utilizar gráficos de PM. Esto se 
hace a través de la posición 
53277. 

Poniéndole un valor 2, le 
indicamos que vamos a utilizar 
PLAYERS y poniéndole un 3, 
PLAYERS y MISSILES. 

En resumen, todos los 
gráficos que utilicen PM deben 
tener en un comienzo las 
siguientes ínstruccitmes: 


Recordemos que lo 
primero que hay que hacer, es 
crear las variables alfanuméricas 
para poder llegar así, a través 
de la tabla de contenido de 
variables, a saber la dirección 
donde se encuentran sus 
contenidos, como vimos en 
números antera >res. 

Los dibujos de las personas 
los creamos de la siguiente 
manera: 


10 BASE=PEEK(106)-nro de 
páginas a reservar 
20 POKE 54279,BASE 
30 PMBASE=BASE*256 
40 POKE 559,valor seleccionado 
50 POKE 53277,valor seleccionado 

A continuación crearemos 
un PM que sea un hombre. Lo 
haremos con dos Players para 
poder hacerlo así de dos 
colores. 










































































18 DIN CABFS(2S6).P£IOS(2S6>.DIBlS(42) 
.DIB2SU2) 

20 GRAPHICS S*16:PnKE 710,66 
30 6A>£:PE£K (106) ’ 16 
40 POKE 54271.BASE 

50 PMBASE:BA5E*256:TOR I:PH6ASE*1024 I 
0 PMBASE*1536¡POKE I.O.NEXT I'.REM DEBE 
MOS BORRAR ÍODA (A ZONA OE PIAYER5 
6# POKE 551.5B: REM PANTALLA Y PLAYERS 
DE RESOLUCION 1 LINEA 
7# POKE 53277.2: REM SOLO PlúYERS 
80 POKE 704,1S:P0KE 705.7 
85 REM MODIFICAMOS EA UUIP PARA OUE AP 
UNTEN A LA ZONA DE PLAYERS 
18 STARP-PEEKC148)«PEEN(141)*2S6 
LOO VtíTP:PEEK<lI4)*PEEK(IIS)*2S6 
LIO I:PMBASE*IB24 SIARP 
120 MB:INT(I/2S6> 

13B POKE 0UIP*2,I HBK256 
140 POKE VVTPt3.H8 
ISO I:PNBASE*1280-STARP 
155 HB:INI(I/2S6) 


160 POKE 0UTPH8.I-MBK2S6 

170 POKE UUTP111.MB 

175 PONEMOS LOS DIBUJOS EN LAS VARIABI 

ES 

180 FOR 1:1 10 *U:READ A:D181S(I,I):CM 
RS(A>:NfXl I 

1*0 FOR 1:1 10 40.READ A:DIB2SCI.1»:CH 
RS(A):NEX( I 

US REM PONEMOS LOS PlAYERS EN I AS POS 

ICIONES 120.100 

200 CABES(100):DIBlS 

210 PEL OS(100):DIB25 

220 POKE 53248.128:P0KE 53241.120 

230 GUIO 230 

1000 ['DIA 0.0,0.0.126,211,111.255,255, 
231.25S.211,102.126.60.24.74,0.0,0,0.0 
. 0 . 0 . 0 . 12 *. 0 . 0 . 0 . 0 . 0 . 0 . 0 , 0 . 0 . 0 . 0 . 8 , 0,0 
10)0 DATA 24.126.255.2SS.121,0.0.O.0.0 
.O,0.0.A.0.6,0.126.255.255.2SS,255.255 
255.255.126.126.126.126.126.126.126 
1020 DATA 102.102.107.102.102,211,231, 
731 



Tomando este mismo 
programa como liase, le 
agregaremos el desplazamiento 
del Player en sentido 
horizontal, el manejo de 
prioridades y el cambio de 
dibujo, utilizado para darle más 
realismo al programa. Para ello 
creamos un tercer dibujo que 
va a reemplazar la cara de la 
persona cambiándole el gesto, 
como se ve en el dibujo más 
abajo. 





Línea completa de Software ATARI 
Juegos, educativos, diskettes 
Línea completa de Audio y Video Maxell 
Computación, Telefonía. 

BARROS ARANA 340, LOCAL 7 • FONO: 238527 • CONCEPCION 
BARROS ARANA 166 • CONCEPCION 






































































A continuación veremos 
con otro programa, cómo 
hacemos el movimiento del 
PLAYER hacia arriba y hacia 
abajo. También mostraremos 
aquí, el uso de colisiones. Los 
dibujos utilizados son los 
siguientes: 


15 DIN DIB1$(28) 

788 CABES(lili:»TB1S:RFM PONEMOS El Pl 
AYER EN 128.11! 

21» PEEOSEll!) 0IB7S 

22» POR! 51248,I70:P0RE S!24),12» 

221 REH 01BU.IAM0S IB CASA 

22! P05III0N a,4:PRINt 06; "AAAAAAAAAAA 

BAAAAAAA" 

225 P0SITT0N 2,S:PR1NI 116: "AAAAAAAAAAA 
AAAARAAAAA" 

2!» P05I1I0H 6.6;PR1NT 06¡"AAAAAAAAAAA 
AAAAAAAAAAAA" 

24» PÜ5XI10N 5,7 : PRIN1 06; "AAAAAAAAAAA 
AAABAAAOOAAAOB" 

25» FOR 1-1 TO 2:POSEIION S,7*1:PRINT 
U6;"BBBBBBBBBBB»»BBBBBBBBB»BB";NEX1 1 
270 FOR 1:1 EO 2:P051I10N S.HIiPRINI 
06;"BBB» BBB BBBBBBBBB":NERT I 
2)0 FOR 1:1 10 llPOSIUON S.ll*I:PRINt 
06:"BtíBBBBBBBBBB BBBBBBBBB";NFK1 1 
JBO FOR 1:1 10 I7:REA0 A;0IB15C1,11 CH 
RSEAÜNFXT I 

210 PORf 67J,4:RE H FIJAMOS 1A PR10RI0A 
0 PARA OUE PASE POR ATRAS DE IA CASA 
120 CABESlltll DlBlSlFOR 1:8» TO 1!B:P 
ORE 52248,1:PORE 51241,I:F0R J:1 TO 10 
:NEXI JINERT 1 

525 REM II CAMBIAMOS El RESTO ÍUANOO V 
UEIVE 

220 CARES(111):»IBX$:FOR 1-170 TO 80 S 
TEP l:PORF 5J74B,I:PORF 5274),I:NEXT 
1 

SAO COTO 120 

1070 BATA 0.0,0.0,126,755.21),7S5,255, 
211,255,211,1B2,102,60,24,24 
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Se utilizan cuatro, uno por 
cada una de las direcciones 
que pueda tomar el auto 
(arriba, abajo, izquierda, 
derecha). 









































































































































































































































10 DIN JEER$(256>,JEEP2S(2S6>.AUTOSI22 
).RUEDASC22).RUFDA7SC72),BlANCOS(256) 
20 DIN 6UI02$(22I.AUT03Sf221,AUT04SC27 
) 

22 REH 10 UARIABlt BlARCOS SE UIIIIZA 
PARA BORRAR IOS P1AVERS A UflOCIDAO DE 
1ERGUAJE DE HAOIIIRA 
25 EOR E=1 TO 2S6:BIARC05(I,Il;CMRS(8) 
¡HERÍ I 

30 GRAPHICS 2*16 
40 IEMRPEEKU06) 16 
50 POKE 54275,IEHP 
60 PMBASE-256RIEHP 

70 POKE 555,58:PURE 53277,2:POKf 704,1 
5:P0KE 705,7 
80 POKE 623,1 

50 S!ARP:PEEK(140)tPEEK(141l«2S6 
100 UUIP:PEEK(i34>«PEEK(13S)*Z56 
110 JzPMBASE 41024 SIARP 
120 HB-INT(1/256) 

130 POKE UUIP*2,I HBR2S6 
140 POKE UUIPES.HB 
150 I:PHBASE«12te SIARP 
160 HB:ZM (1/256) 

170 POKE UUIPMO.I HB»256 

180 POKE UUIPMl.HB 

185 REH CARGANOS IOS DIBUJOS 

150 EOR 1:1 10 22IREAD A:OIMOS CI,I):CH 

R$(0):NEHI I 

200 EOR 1:1 10 22:READ A:AUI025(I.I):C 
HRS(A):NEX1 I 

210 fOR 1:1 10 22:READ A:AUI035(I,I):C 
HRS (A) .'HERI I 

220 FOR 1:1 10 22IREAD A:0UI04SU,I):C 
HRS(Al:REXI I 

230 FOR 1:1 10 22:RIAD AiRUEDAS(1,1)-C 
HRS(A):REHI I 

240 FOR 1:1 10 22:RF60 A'.RUE DA2S II, I) 

CHRÍ(A):REH1 I 

245 DIBUJANOS 1A PIS1A 

250 PRIRI 1161 "AAAAAAAAAAAAAAAAAAAAAAAA 

AAAAAAAAAAAAAA' 

260 FOR 1:1 10 22i’ U6í"A 

A":REKt 1 

270 PRINI H6:"AAAOAAAAAAAAAAAAAAAAAAAA 


AAAAOAAAAOAAOA" 

230 POSIIIOR a.5:PRIRl 116:"AAAAAAAAAAA 
AAAAAAAAOA" 

285 FOR Irl 10 12:P0SIII0R 8,S*I:PRIRI 
U6;"A A":HEHt 1 

250 POSIIIOR 8,18:PRIRI U6;"AAAAAAAAAA 
AAAAAAAAAAA" 

255 POSIIIOR 31,12:PRIRI H6:"AAAAAA" 
750 REH IOOP PRINCIPA! 

300 HPOS:80:UP0S:180:JEEPS(OPOS):OUIOS 
:JEEP2S(UPOS):RUEOA$ 

310 J0V:SIICK<0):POKE 53278,0 

320 IF J0Y:7 1HER HP0S:HP0S*3-(HPOS)20 

0)R3:JEEPS(UPOS):AUIOS:JEEP2S(«P0S):RU 

EDAS:GOIO 400:REH DERECHA 

330 IF JOY:ll IHER HP0S:HP0S-1*(HP0S<5 

0)R3:JEEPS(VPOSI AUI02S:JEEP2»COPOS)-R 

UEDAS'.GOIO 400 : REH IZQUIERDA 

340 IF ,I0Y:I4 THER UPOS:UPOS 3*(UPOS<3 

5)R3!JEEPS(VP0S):AUI03S¡JEEP2SCUPOS):R 

UE0Q2$:G010 4001REN ARRIBA 

350 IF J0Y:13 IHER 0P0S:UP05»3 (UP05>2 

38)»3¡JEEPS COPOS):AUI04S:JEEP2i COPOS): 

RUEDA2S:G0I0 400:DIN ABAJO 

400 POKF 53248,IIPOS:POKE 53245,HPOS 

410 IF PEEK (53252) O0 IHER 510:RIN HtlB 

O CHOQUE’ 

420 GOTO 310 

508 REH RUI IRA DE CHOQUE 

S10 FOR I: I 10 10(1 :R: 1100 I),' 10: SOIlKfr 

6,I,A.R:REKI I 

520 JEEPS BIANCOS 

530 JEEP2S BI ARCOS 

500 SOUND O.O.O.OlGOIÚ 300 

600 DATO 0.8.0.0.0.8,0.255.2S5,137.137 

,107,107.255,255.0.0,0,0,0.0.0 

610 DATA 0.0,0.0,0.0,0,755,255,22I,22I 

,221,221,255,255.0.0.0.0.11,0.0 

620 DAIA 0,0.0,60 60.60,60,36,36,60,60 

,60,60,60.60.36.16.60,60.0,0 O 

630 DAIA 0.0.0,60,60.36.36,60,60.60,60 

.60,60,36,36.60.60,60.60.0,0.0 

650 DAIA 0,O,0,0,0,107.102,0,0,O,0,0.O 

.0.0,107.107,0.0.0,0,0 

660 DAIA 0,0.0.0,0.66.66.66,66,0,0,0,0 

,66.66.66.66.0,0,0,0,A 


Para evitar que el auto se 
vaya de las límites de la 
pantalla, se ponen unas 
fórmulas matemáticas para 
asegurarse que el auto quede 
siempre en pantalla. Por 
ejemplo, si queremos que 
HPOS nunca sea mayor a 200. 
hacemos HPOS=HPOS+3- 
(HPOS>200)*3. 

Si HPOS es menor a 200, 
no hay problema, la expresión 
(HPOS>200) vale O y HPOS se 
incrementa en tres. Cuando 
HPOS es mayor a 200, dicha 
expresión vale 1 multiplicado 
por 3 da 3, es decir, le suma 
tres pero también se lo resta, 
permaneciendo igual. 

Te desafiamos a que 
mejores la rutina de choque, 
por ejemplo dibujando un auto 
destrozado. También puedes 
agregarle un contador de¬ 
vueltas y fabricar más pistas. 

Una 

Cuando queramos detener cada 
uno de los programas 
anteriores, si lo hacemos con la 
tecla BREAR, al estar los 
PLAYKRS conectados, quedará 
una franja muy molesta en 
pantalla (compruébalo). Por eso 
conviene detener el programa 
con la tecla RESET 

¡¡Nos vemos en el siguiente 
número!! 



•CASSETTES DE JUEGOS 
•CASSETTES EDUCATIVOS 
•LAPIZ DE LUZ 


PARA SU ATAR! 







BANKING DEL MES 


TITULO 


B6 


POS. DEL POS. MES 

MES ANTERIOR 


LEGACY II 


1 


4 

HARDBALL 

2 


9 

INTERNATIONAL KARATE 

3 


6 

CRYSTAL RAIDER 

4 


11 

HENRY’S HOUSE 

5 


5 

GHOSTCHASER 

6 


- 

LEGACY II 

7 


- 

GREMLINS 

8 

'H'-. 

3 

NINJA 

9 


2 

MONTEZUMA’S REVENGE 

10 


14 

FIGHTER PILOT II 

11 


18 

BOULDER DASH 1 

12 


1 

SUPER SOCCER 

13 


- 

ZAXXON 

14 


- 

BC’S QUEST FOR TIRES 


15 13 GREAT AMERICAN RACE 


En este excelente simulador de combate, 
debes evitar que el enemigo destroce tus 
ciudades y hunda tus barcos. Posees un mapa 
sobre el cual te podrís desplazar, con el 
consiguiente gasto de combustible, para 
atacar sus ciudades, representadas por 
pequeños rectángulos, o sus barcos y 
dibujados como puntos blancos sobre el 
mapa. Para el ataque cuentas con tres armas: 
barcos, aviones bombarderos y un satélite 
defensivo para destruir las oleadas de misiles 
dirigidas hacia nuestras ciudades. 

Cuando enfrentes un barco, debes hacerlo 
con uno propio, con la ayuda de un radar y 
poderosos torpedos. Ten cuidado de no ser 
alcanzado por los misiles mar-mar que te 
serán arrojados. Las ciudades enemigas 
podrás destruirlas con los bombarderos. 
Cuando sientas la alarma, significará que te 
han lanzado misiles. Un contador comenzará 
la cuenta regresiva que te indicará el tiempo 
que tienes para eliminarlos con el satélite, 
antes que éstos hagan impacto en tus 
ciudades. 
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LEADER BOARD GOLF 

TABLE SOCCER 

RAID OVER MOSCOW 

SCREEMINGS WINGS 1942 

GHOSTBUSTER 

SWAT 

RIVER RAID 

BMX SIMULATOR 

STAR RAIDERS II 

SUPER PACMAN 


ASCENSO CONSTANTE DESCENSO 


Este es el Ranking correspondiente al mes de Abril, obteni¬ 
do en base a las estadísticas de ventas de cassettes Turbo 
Software en todo Chile. Recuerda que tus preferencias tam¬ 
bién serán tenidas en cuenta, para lo cual podrás escribir a 
Av. Feo. Bilbao 4226. Las Condes, con los juegos de tu elec¬ 
ción. 
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SONIDO 6 

GRAFICACION 6.7 
ADICCION 6.7 
PRESENTACION 6.6 
PROMEDIO 6.35 


BOULDER DASH I 

En este entretenido juego, comandas a 
Bouider Dash, un simpático personaje, que 
deberás conducir cavando a través del 
terreno en búsqueda de valiosos diamantes 
para poder, luego de juntar un número 
determinado de ellos, pasar de nivel. Este 
contiene un laberinto de paredes de ladrillo 
y de pesadas rocas. Deberás descubrir, en 
cada uno de los niveles, cómo hacer para 
transformar rocas en diamantes, para juntar 
así la cantidad necesaria para poder pasar a 
la pantalla siguiente. Debes tener cuidado al 
cavar debajo de una roca, ya que ésta te 
puede caer encima. También debes tener 
cuidado de los extraños seres que se 
moverán por los túneles cavados por ti, que 
tratarán de alcanzarte y matarte. Ix>s podrás 
eliminar haciendo que les caigan rocas 
encima tic ellos. Este juego es similar al 
Bouider Dash II. del que sólo difiere en sus 
escenarios. 


GREMLINS 

IX- la lamosa película GREMLINS ha sido 
extraído este entretenido juego. Eos 
GREMLINS, extrañas criaturas venidas de 
otro planeta, se han instalado en tu casa. Son 
dóciles y fáciles de capturar y encerrar. Pero 
cuando se alimentan se vuelven feroces y 
únicamente matándolos con una espada 
podrá evitar que lo ataquen. Tienes hasta las 
seis de la mañana para capturar a los 
extraños seres. De lograrlo, obtendrás un 
puntaje extra. Deberás, también, ir 
recogiendo la comida que hay en el suelo 
para evitar, así, que los pequeños seres se 
alimenten y se transformen. Existen unas 
zonas que harán que los extraterrestres que 
pasen por allí se dupliquen. Deberás evitar 
también que los malignos seres se acerquen 
a la jaula y liberen a los que allí se 
encuentren encerrados. 
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TURBO PUZZLE: 

DIAGRAMA 1 
TIZARAN 

EXPORTAR TINTE H 
RADIO KANT 
NI AJEN 
MARCAN P 
SIMON BARROS 
CUELE BREA 
TUMBE LA X 
BOLLITO FA 
HONRE SU YESO H 
TENDI EL TV LLI 
ARROZ O 
DR. SIERRALTAS 
EL PERRO KARPI 
IRRADIAR VE 
MU EN MOZART 
PASE CRUCEROS 
PELOTON PISITO 
CABLE SECRETO 


DIAGRAMA 2 



En las extrañas frases del 
Diagrama 1, están escondidos 
los nombres de algunos de los 
más entretenidos juegos 
ATARI; para encontrarlos 
debes reordenar las letras de 


cada una, teniendo en cuenta 
que hay una de más, la cual 
deberá ir poniéndose en la 
columna señalada, donde se 
podrá leer verticalmente, el 
nombre de otro de tus juegos 


favoritos. 

Todos los títulos de juegos, 
puestos aquí, han aparecido en 
alguno de los rankings de 
ediciones anteriores. 





















































































BASIC 



1 REM SAVE "D:BA5IC9.L5T 

100 DCB=768:P0KE 752,1 

200 DIM SECT0R?(128),CANTS(6),PRECI0S( 

7),M0DIF?(5),DE5CRIP?(26).BLANCOS?(200 

),RE5PS(1),RAYA?(50),PROVEEDOR?(16) 

210 DIM PROGS (6) 

220 FOR 1-1 TO 5: READ A:PROG$(I.D-CHR 
S(A):NEXT I 

250 FOR 1=1 TO 50:RAYA?(I,I)="-":NEXT 
I 

300 FOR X-l TO 2O0:BLANCO5S(X)r» »:NEX 
T X 

4O0 G05UB 20000 

1000 GRAPHICS 0:POKE 710,1:? "*¡ 

—nr 

1100 ? "*4**1 ALTAS" 

1200 ? "442 M0DIFICACIONES/CON5UL TAS" 
1360 ? "443 IMICIALIZAR DISXETTE" 

1400 ? "444SU OPCION: ";:IMPUT RESP 
1410 ? "K":ON RESP GOSUB 2400.3355,110 
00 

1450 GOTO 1000 

1850 REN XXX X XXXXXXXXXXXXK X X X XX X X X XX XX 
*** E/S DE SECTORES *#* 
XXX X XXXX X XXXXXXXXXXXXXXXXXXXX 
1900 SECTORHI=INT(5ECT0R/256) 

2000 5ECT0RL0-SECTQR-(SECT0RHI*256) 
2100 POKE DCB+10.SECTORLO 
2200 POKE DCB+11,SECT0RHI 
2300 X=USR (ADR(PROGS)):RETURX 

*#* ALTAS X-X-X 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
2400 POSITION 1,1:? "ARTICULOPOSITI 
OH 11,2:? RAYA$(1,4) 

2500 POSITION 1,4:? "DESCRIPCION:":POS 
ITION 14,5:? RAYAS(1,26) 

2550 POSITION 1,7:? "PROOVEDOR:":P05IT 
ION 12,8:? RAYAS (1,16) 

2600 POSITION 1,10:? "CANTIDADPOSIT 
ION 11,11:? RAYAS(1,6) 

2700 POSITION 1,13:? "PRECIO:":POSITIO 
N 9,14:? RAYAS(1,7) 


2850 POSITION 10,1:INPUT CODIGO 
2870 5ECTOR-CODIGO/2+0.5 
2875 SECT0RS-BLANC05S 
2392 SECTOR-INT (SECTOR) 

2894 POKE DCB*2,82:G05UB 1900 
2900 POSITION 13,4:INPUT DESCRIPS 
2920 POSITION 11,7:INPUT PROVEEDOR? 
2950 POSITION 10,10:INPUT CAHTS 
3000 POSITION 8,13:INPUT PRECIO? 

3O70 SECTOR-CODIGO/2+0.5 
3080 AUX=64:IF INTÍ5ECT0R)-SECTOR THEN 
AUX=0 

3985 SECTOR-INT(5ECT0R) 

3100 5ECT0RS (AUX+1,AUX + 64)rBLANCOS?(1, 
64) :SECTORS (1*-AUX,26 + AUX) - DESCRIPS 
3130 SECTORS(274AUX,434AUX)rPROVEEDORS 
:SECTORS (44+AUX,50+AUX)=CANTS 
3150 SECTORS(51+AUX,58+AUX)rPRECIO? 
3200 POKE DCB*2,87:GOSUB 1900 
3250 RETURN 

3350 REM xx x xx -x xxxxxxxxxxxxxxxx x x x x x xx 
*** MODIFICACIONES *** 

3355 ? "ARTICULO A MODIFICAR: "¡INPUT 
CODIGO:SECTOR=CODIGO/2+0.5 

3356 AUX=64:5ECTOR?-BLANCOS? 

3357 IF INT(SECTOR):SECTOR THEN AUX = 0 

3359 SECTORrINT(SECTOR) 

3360 POKE DCB+2,82:60SUB‘1900:? "N" 
3400 POSITION 1,1!? "ARTICULO: ";CODIG 
0:P05ITI0N 11,2:? RAYAS(1,4) 

3500 P05ITION 1,4:? "DESCRIPCION: ";5E 
CT0RS(14AUX,26+AUX)¡POSITION 14,5:? RA 
YA$ (1,26) 

3550 POSITION 1,7:? "PROOVEDOR: ";5ECT 
OR?(27+AUX,43+AUK)¡POSITION 12,8:? RAY 
AS (1,16) 

3600 POSITION 1,10:? "CANTIDAD: ";SECT 
OR?(44+AUX,50+AUX)¡POSITION 11,11:? RA 
YAS (1,6) 

3700 POSITION 1,13:? "PRECIO: "¡SECTOR 
SC51+AUX,58+AUX)¡POSITION 9,14:? RAYAS 
(1,7) 

3850 POSITION 10,l:INPUT CODIGO 
3900 POSITION 13,4¡INPUT DESCRIPS 
3920 POSITION 11,7:INPUT PROVEEDOR? 


ncipal 


«enu 









30 


3958 P05ITI0M 18,10:INPUT CAMT$ 

4008 P05ITI0N 8,13:INPUT PRECIOS 
4070 SECTOR=COD160/2+0.5 
4080 AUXr64:IF IHT(SECTOR)^SECTOR THEM 
ÚUXrO 

4085 SECTORrlNT (SECTOR) 

4100 SECTOR$(AUX+1,OUX+64)=BLANCOS5 (1, 
64)¡SECTORS(1+AUX,26+ftUX)rOESCRIPS 
4130 SECTOR*(27+AUX,43+AUX)^PROVEEDOR* 
!SECTOR*C44+AUX,50+flUX)rCANT* 

4150 SECTOR*(51+AUX,58+ftUX)zPRECIO* 
4200 POKE DCB+2,87:G0SUB 1900 
4250 RETURK 

10900 REN XXXMXXXXXKK I ÍXXXXXKXKKX X KXXXX 
*#* INICIALIZACION *** 
xxx x xxxxxxxxxxxxxxxxxxxxxxxx 
11000 ? "is ESTA SEGURO 5/N":INPUT RES 
P*:IF RESP*O"5" THEN RETURN 
11005 XIO 254,til,8,0,"OI!" 

19999 REM x x xx iHtxx xx xx x xx-x xxxxxxxxxxxx 

*** DIRECCION VARIABLE *** 

» X XXX X X X X - X - X - XX ^ XXXXXXXXXXXXXX 

20000 ADOR:ADR(SECTORS) 

20010 ADDRHI^INT(ADDR/256) 

20020 ADDRL0=ADDR-(ADDRHI*256) 

20030 POKE DCB+4,ADDRLO 
20040 POKE DCB+5,ADDRHI:RETURN 
20050 DATA 104,32,83,228.96 

ASSEMBLER 

0100 ;SAVE0D:ANALCMD.MAC 

01 10 j 

0120 s RUTINA QUE ANALIZA SI EL 
0130 s COMANDO ES VALIDO. Y SI LO 
0140 ; ES SALTA A LA SUBRUTI NA DIJE 
0150 ; LO EJECUTA. 

0160 ; 

0170 ANAL IZOCMD 
0180 ; 

0190 ; F'OINTERAIIX APUNTA A LA PRIMER 
0200 ; POSICION DE LA TABLA DE COMAN- 
0210 ; DOS PARA RECORRERLA. 

0220 s 

0230 LDA X <CMD 

0240 STA POINTERAUX 

0250 LDA tt >CMD 

0260 STA POINTERAUX*1 

0270 LDY 00 

0280 LOOPCMD 
0290 ; 

0300 ; SI EN LA TABLA DE COMANDOS 
0310 ; APARECE UN ÍFF, ES PORQUE 


0320 

; 

NO EXISTE NINGUN OTRO COMANDO, 

0330 

i 

POR LO TANTO, EL COMANDO INGRE 

0340 

5 

SADO NO ESTA EN LA TABLA Y ES 

0350 


INVALIDO. 

0360 

■ 

* 


0370 


LDA (POINTERAUX),Y 

0380 


CMP 0*FF 

0390 


BNE CMDVALIDO? 

0400 


LDA 0 <ROTINV 

0410 


STA MANDO 

0420 


LDA 0 >ROTINV 

0430 


STA MANDO*1 

0440 


JSR IMPRIMO 

0450 


RTS 

0460 

CMDVAL I DO-> 

0470 

• 

* 


0480 

S 

SI NO APARECIO EL *FF, COMPARO 

0490 

5 

EL COMANDO INGRESADO EN LINEA 

0500 

• 

CON LA SINTAXIS DEL COMANDO 

0510 

1 

ESCRITA EN LA TABLA. 

0520 

: 


0530 


LDY 01 

0540 


LDX 00 

0550 

SONIGUALES? 

0560 


LDA LINEA,X 

0570 


CMP (POINTERAUX),Y 

0580 


BNE OTROCMD 

0590 


INY 

0600 


INX 

0610 


LDA LINEA,X 

0620 


CMP 0Í9B 

0630 


BNE SON IGUALES? 

0640 


DE Y 

0650 


TYA 

0660 


LDY 00 

0670 


CMP (POINTERAUX),Y 

0680 


BEQ SALTOALCOMANDO 

0690 

OTROCMD 

07Ó0 

; 


0710 

i 

31 LOS COMANDOS NO SON IGUALES 

0720 

? 

ANALIZO EL SIGUIENTE. 

0730 

5 


0740 


CLC 

0750 


LDY 00 

0760 


LDA (POINTERAUX),Y 

0770 


STA AUXSUM 

0780 


LDA POINTERAUX 

0790 


ADC 03 

0800 


STA POINTERAUX 

0810 


LDA POINTERAUX*1 

0820 


ADC 00 

0830 


STA POINTERAUX*1 

0840 


CLC 

0850 


LDA POINTERAUX 

0860 


ADC AUXSUM 

0870 


STA POINTERAUX 

0880 


LDA POINTERAUX♦1 

0890 


ADC 0O 

0900 


STA POINTERAUX+1 

0910 


JMP LOOPCMD 


0920 SALTOALCOMANDO 
0930 ; 

0940 ; SI LOS COMANDOS FUERON IGUALES 
0950 ; SALTO A LA DIRECCION DE LA 
0960 ; RUTINA DE ATENCION DEL COMANDO 
0970 ; QUE SE ENCUENTRA APUNTADA POR 
0980 ; LOS DOS BYTES SIGUIENTES AL 








0990 

1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 

1090 


0100 
01 10 
0120 
0130 
0140 
0150 
0160 
0170 
0180 
0190 
0200 
0210 
0220 
0230 
0240 
0250 
0260 
0270 
0280 
0290 
0300 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 
0390 
0400 
0410 
0420 
0430 
0440 
0450 
0460 
0470 
0480 
0490 
0500 
0510 
0520 
0530 
0540 
0550 
0560 
0570 
0580 
0590 
0600 
0610 



NOMBRE DEL COMANDO EN LA TABLA 

0620 

! QUEDA 

EN LBUFF. 



0630 

• 

* 



LDA 

(POINTERAUX),Y 

0640 


LDY 

#0 

TAY 


0650 

L20 



INY 


0660 


LDA 

LBUFF,Y 

LDA 

(POINTERAUX),Y 

0670 


BMI 

INV 

STA 

JUMPER 

0680 


STY 

GUARDOY 

INY 


0690 


JSR 

ÍF2B0 

LDA 

(POINTERAUX),Y 

0700 


LDY 

GUARDOY 

STA 

JUMPER+1 

0710 


INY 


JMP 

(JUMPER) 

0720 


JMP 

L20 



0730 

INV 




; SAVE#D: LIST. MAC 

i RUTINA QUE EJECUTA EL COMANDO 
; LIST. REALIZA UNA IMPRESION 
; DEL LISTADO DEL PROGRAMA EN 
j LA PANTALLA DEL COMPUTADOR. 

1 

LIST 


POINTERAUX1, APUNTA AL INICIO 
DE LA TABLA DE INSTRUCCIONES 
PARA RECORRERLA E IMPRIMIR SU 
CONTENIDO. 


LDA # <TABLA 
STA POINTERAUX1 
LDA # >TABLA 
STA POINTERAUX1+1 
INITLIST 
I 

» SI LLEGUE AL FINAL DE LA TABLA 
5 YA EJECUTE TODO EL COMANDO POR 
; LO TANTO CONTINUO CON EL 
; PROGRAMA PRINCIPAL. 

% 

LDA FINTAB+1 
CMP # >TABLA 
BNE N0VAC1 
LDA F1NTAB 
CMP # < TABLA 
BNE N0VAC1 
RTS 
NOVAC1 


UTILIZANDO LAS SUBRUTINAS DEL 
SISTEMA OPERATIVO DEL COMPUTA 
DOR, TRANSFORMO LOS DOS BYTES 
DEL NUMERO DE INSTRUCCION, 

LO Y HI BYTES, EN NUMEROS 
ATASCII QUE PODEMOS IMPRIMIR 
EN LA PANTALLA. 

LDY #0 

LDA < POINTERAUX1> ,Y 

STA FRO 

INY 

LDA (POINTERAUX1>,Y 
STA FRO+1 
JSR ÍD9AA 
JSR *D8E6 


5 EL RESULTADO DE ESTA RUTINA 


0740 

0750 

0760 

0770 

0780 

0790 

0800 

0810 

0820 

0830 

0840 

0850 

0860 

0870 

0880 


s 


EL ULTIMO CARACTER DEL NUMERO 
EL SISTEMA OPERATIVO LO DA 
EN VIDEO INVERSO PARA SABER 
QUE ESTE ES EL ULTIMO. 

AND #*7F 
JSR *F2B0 
LDA #32 
JSR *F2BO 


; UNA VEZ QUE DESPLEGAMOS EL 
; NUMERO DE LINEA, RECORREMOS 
; LA INSTRUCCION Y LA IMPRIMIMOS 


0890 

LDY 

«2 

0900 

LDA 

(POINTERAUX1 

0910 

TAX 


0920 

INY 


0930 L21 



0940 

LDA 

(POINTERAUXl 

0950 

STY 

GUARDOY 

0960 

STX 

GUARDOX 

0970 

STA 

GUARDOA 

0980 

LDA 

#27 

0990 

JSR 

«F2B0 

1000 

LDA 

GUARDOA 

1010 

JSR 

ÍF2B0 

1020 

LDY 

GUARDOY 

1030 

LDX 

GUARDOX 

1040 

INY 


1050 

DEX 


1060 

BNE 

L21 


1070 
1080 
1090 
1 100 
1 1 ÍO 
1 120 
1 130 
1140 
1 150 
1160 
1 170 


IMPRIMO UN RETURN PARA QUE 
EL CURSOR CAMBIE DE LINEA. 

LDA #Í9B 
JSR ÍF2BO 

MODIFICO A POINTERAUX1 PARA 
QUE APUNTE A LA NUEVA 
INSTRUCCION PARA SU LISTADO. 


1180 

CLC 


1 190 

LDY 

#2 

1200 

LDA 

(POINTERAUX1) , Y 

1210 

ADC 

#3 

1220 

STA 

CANT 

1230 

CLC 


1240 

LDA 

POINTERAUX1 

1250 

ADC 

CANT 

1260 

STA 

POINTERAUX1 

1270 

LDA 

POINTERAUX1+1 

1280 

ADC 

#0 

1290 

STA 

POINTERAUX1+1 




1300 

CMP 

FINTAB+1 

1310 

BCC 

N0VAC1 

1320 

LDA 

POINTERAUX1 

1330 

CMP 

FINTAB 

1340 

BCC 

NOVAC1 

1350 

RTS 



OlOO ;SAVE»D:GENERAL.MAC 

01 10 ; 

0120 ; EN ESTE LISTADO, INGRESAMOS 
0130 ; ALGUNAS RUTINAS DE USO 
0140 ; GENERAL EN EL PROGRAMA. 

0150 ; 

0160 OVERFLOW 
0170 ; 

0180 ; RUTINA QUE IMPRIME EL MENSAJE 
0190 ; DE MEMORIA EXCEDIDA. 

0200 ; 

0210 LDA N <ROTOVER 

0220 STA MANDO 

0230 LDA M iROTOVER 

0240 STA MANDO*1 

0250 JSR IMPRIMO 

0260 RTS 

0270 IMPRIMO 
0280 5 

0290 ; RUTINA QUE IMPRIME UN TEXTO 
0300 ; APUNTADO POR MANDO Y MANDO*1 
0310 ; HASTA QUE ENCUENTRA UN *. 

0320 ; 

0330 LDY #0 

0340 LOOP IMPRIMO 
0350 LDA (MANDO),Y 

0360 CMP *1 ' » 

0370 BEQ FINIMPRIMO 

0380 STY GUARDQY 

Ó390 JSR ÍF2B0 

0400 LDY GUARDOV 

0410 INY 

0420 JMP LOOP IMPRIMO 

0430 FINIMPRIMO 

0440 RTS 

0450 SETPOI NTERADX 

0460 LDA I* < TABLA 

0470 STA P01NTERAUX 

0480 LDA # >TABLA 

0490 STA POINTERAUX* 1 

0300 RTS 

0510 NEW 

0520 ; 

0530 ; RUTINA QUE EJECUTA EL COMANDO 
0540 ; NUEVO, QUE BORRA TODO EL PRO- 
0550 s GRAMA. EN REALIDAD LO UNICO 
0560 s OUE HACE ES CAMBIAR EL PUNTERO 
0570 ; FINTAB AL INICIO DE LA TABLA, 
0580 ; SIN BORRAR LA MEMORIA, PUES 
0590 ; NO ES NECESARIO. 

0600 ; 

0610 LDA # <TABLA 

0620 STA FINTAB 

0630 LDA # >TABLA 

0640 STA FINTAB*1 

0650 RTS 

0660 EXISTELIN 
0670 ; 

0680 ; RUTINA QUE RECIBE UN NUMERO 


0690 ; DE LINEA EN DESDENUM Y 
0700 ; DESDENUM*1 Y VERIFICA SI ESTE 
0710 s NUMERO DE LINEA EXISTE EN EL 
0720 ; LISTADO. 

0730 ! 


0740 

JSR 

SETPOINTERAUX 

0750 

LOPESTA? 

0760 

LDA 

POINTERAUX + 1 

0770 

CMP 

FINTAB+1 

0780 

BCC 

PUEDESER 

0790 

LDA 

POINTERAUX 

0800 

CMP 

FINTAB 

0810 

BCC 

PUEDESER 

0820 

RTS 


0830 

PUEDESER 

0840 

LDY 

*tl 

0850 

LDA 

DESDENUM*1 

0860 

CMP 

(POINTERAUX),Y 

0870 

BEQ 

VEOLO 

0B80 

BCS 

AVANZO 

0890 

RTS 


0900 

AVANZO 


0910 

» 


0920 

; AVANZO A LA SIGUIENTE 

0930 

; INSTRUCCION. 

0940 

; 


0950 

CLC 


0960 

LDY 

«2 

0970 

LDA 

(POINTERAUX),Y 

0980 

STA 

AUXSUM 

0990 

LDA 

POINTERAUX 

1000 

ADC 

W3 

1010 

STA 

POINTERAUX 

1020 

LDA 

POINTERAUX*1 

1030 

ADC 

«0 

1040 

STA 

POINTERAUX*1 

1050 

CLC 


1060 

LDA 

POINTERAUX 

1070 

ADC 

AUXSUM 

1080 

STA 

POINTERAUX 

1090 

LDA 

POINTERAUX * 1 

1 lOO 

ADC 

no 

1110 

STA 

POINTERAUX*1 

1 120 

JMP 

LOPESTA" 1 

1 130 

VEOLO 


1 140 

LDY 

«O 

1 150 

LDA 

DESDENUM 

1 160 

CMP 

(POINTERAUX),Y 

1 1 70 

BEQ 

ESTALINEA 

1180 

BCS 

AVANZO 

1 190 

RTS 



1200 ESTALIÑEA 

1210 ; SI LA LINEA ES HALLADA 
1220 ; FLAGESTA VUELVE CON ÍFF 
1230 ; 

1240 LDA tt-ÍFF 

1250 STA FLAGESTA 

1260 RTS 

1270 FLAGESTA 
1280 .BYTE *00 




ADQUIERALOS EN LOS SIGUIENTES PUNTOS DE VENTAS 

• ANTOFAGASTA: COOPERCARAB KW VIDEO LA ESPAÑOLA « VINA DEL MAR: FALABELLA VlNA INSIS MPR 
COMPUTACIQÑ • VALPARAISO: COMPUTRONIC,* SANTIAGO: AUDIÓ.BICICLÉTA INTERNAC CASA RpVAL CENTRO 
ATARI COMERCIAL ESTADO COMPUMANQUB COMPUCENTER FÁLABElLA AHUMADA FALABEELA P. ARAUCO 
IMACO IÑFOGf^OUP PC STORE PETER^ÉN ROLEC SUPERMERCADOS UNIMARC TASCO VlOEO CLUB 
INTERNACIONAL • RANCAGUA: CASA ZÜNIGA • CURICO: MULTIHOGAR • TALCA LIBRERIA EL AHORRO 
MULTICENTRO VÍDEO CLUB CASSAL • CHILLAN: CASA EDISON • CONCEPCION: COOPERCARAB DISMAR DÍSMAR 
2 EGUS PHANTÉR RAPSODIA SESCO • LOS ANGELES: DISTRIBUIDQRA'^ERINO • ANGOL: SCORPIO • VICTORIA: 
CASA SIGMUND» TEMUCO: COMERCIAL MANbUEHUE ESTABLECIMIENTOS GEJMAN FALABELLA • PUCON: ELTíT 

• VILLARRICA: JOYf RIA KETTERER • VALDIVIA: ELECTROMUSICA • LA UNION; IMPORTADORA COSMOS • OSORNO;. 
CASA REAL FOTO, EXPRESS • PUERTO VARAS: ELECTRO HORN • PUERTO MONTT: COMERCIAL MANOUEHUE 
DIMARSA • COYHAIOUE: FACI HOGAR • PUNTA ARENAS: BALFER LTDA 






















COMP 


1 COMPUTADOR 65 XE 

1 CASSETTERA 

2 JOYSTICKS 
6 JUEGOS 

$64.700 


JOYSTICK 

JOYSTICK CAUCA. 

BC 201 

CON MICROS WITCH.— 

BG 747- 

BC IOS... 

BC -- 

QUICK SHOT I—.— 

QUICK SHOT IIIAUTOOISPARO). 


PROGRAMAS EDUCATIVOS 


CAIAS PORTADISKETTES 


SERIE TM (TELEMATICA) 
DESDE S 1.790 



S 3.650 


CASSETTES EDUCATIVOS 
TURBO SOFTWARE DESDE $ 89S 


DISKETTES 3.5' 


DISKETTES 5 1/5 2S-2D: 

VERBATIN.S 390 C/U 


S 630 
1640 


S3SS CIU 



PRIMER CENTRO ELECTRONICO CHILENO 


AV. L. B. O’HIGGINS 845 MONJITAS 813 

FONOS: 333908 391624 FONOS: 399046 392714 

FAX: 399047 -TELEX 340617 

DESPACHOS A PROVINCIA PREVIO ENVIO DE CHEQUE. VALE VIST* 
O GIRO TELEGRAFICO A CORREO 21 CASILLA 395 V STGO 


• ELECTRONICA 


0ELECTRICIDAD 0COMPUTACION 


AUDIO VIDEO 























